home *** CD-ROM | disk | FTP | other *** search
/ Amiga Plus 2002 #11 / Amiga Plus CD - 2002 - No. 11.iso / Tools / Development / PowerD / powerd / source / lib / powerd_lib.lha / PowerD_PPC / IsAlpha.ass < prev    next >
Text File  |  2000-10-26  |  262b  |  23 lines
  1.  
  2. # IsAlpha(r3:LONG)(LONG)
  3.  
  4.     .text
  5.     .global    _IsAlpha
  6.  
  7. _IsAlpha:
  8.     cmpwi    r3,"A"
  9.     blt    .false
  10.     cmpwi    r3,"Z"
  11.     ble    .true
  12.     cmpwi    r3,"a"
  13.     blt    .false
  14.     cmpwi    r3,"z"
  15.     bgt    .false
  16. .true:    li    r3,-1
  17.     blr
  18. .false:    li    r3,0
  19.     blr
  20.  
  21.     .type    _IsAlpha,@function
  22.     .size    _IsAlpha,$-_IsAlpha
  23.